도면 내 치수 기입에 관한 추가 검토 요청
페이지 정보
작성자 정연욱 작성일 24-01-24 13:33 조회 1,680 댓글 4본문
또 한번 명령어 검토 요청 드립니다.
예전에 CADPOWER를 사용하면서는
구조도면을 작성중 친수기입에 대하여
일반적인 치수기입으로 그림2와 같이 사용하다가
LD 라는 리습명령을 사용해서 그림1(LD요청.jpg)과 같이 표기하고
LD라는 명령이 아닌 다른 치수기입시에는 일반적(LD 요청_00000.jpg) 치수기입으로
자동 변경되는 리습을 구하거나 Xicad에 추가해 줄 수 있을지 문의 드려봅니다.
첨부파일
- 요청.dwg (38.8K) 2회 다운로드 | DATE : 2024-01-24 13:33:26
댓글목록 4
정연욱님의 댓글
정연욱 작성일
DIMSTYLE은 현재 작업하기 용이하도록 구분해서 만들어 둔 타입일 뿐입니다.
바라는것은 DIM을 선택했을때 특성에서 "치수선 너머 연장선"과 "원점에서 간격 띄우기"를
켜고 끌 수 있기를 바라는것입니다.
DIMSTYLE는 한 가지로 작업하다가 LD(LineDraw)라는 명령으로
DIM을 작성할때는 치수선너머 연장선과 원점에서 간격 띄우기가 "0"으로
자동 변경되어 작업 할 수 있는 개념입니다.
물론 다른 DIM작성할 떄는 자동으로 원래대로 되돌려 작업이 가능해야 되겠지요.
답변해 주셔서 감사하고 성의있게 검토하여 질문 주셔서 감사합니다.
이자더님의 댓글
이자더 작성일
치수 모양은 DSE 를 사용하시면 되세요.
그리고, 간격띄우기를 0 으로 하는 치수 입력은 아래 문구를 사용하시면 되세요.
(명령어 xxx 는 입맛에 맞게 바꾸시면 되고요.)
(defun c:xxx ( / ent ent-1 obj pt1 pt2 pt3 )
(setq ent-1 (entlast))
(if
(and
(setq pt1 (getpoint "\n>> 첫번째 원점 지정: "))
(setq pt2 (getpoint pt1 "\n>> 두번째 원점 지정: "))
(setq pt3 (getpoint pt2 "\n>> 치수 위치 지정: "))
)
(progn
(command "_.DIMLINEAR" pt1 pt2 pt3)
(if (= 1 (logand 1 (getvar 'CMDACTIVE))) (command ""))
(setq ent (entlast))
(if (not (equal ent ent-1))
(progn
(setq obj (vlax-ename->vla-object ent))
(vlax-put obj 'ExtensionLineExtend 0)
(vlax-put obj 'ExtensionLineOffset 0)
)
)
)
)
(princ)
)
이자더님의 댓글
이자더 작성일안녕하세요.
올려 주신 도면을 보니...
하나는 "DIM_150_s-LD" 라는 치수모양으로 되어 있고, 하나는 "DIM_150_s" 라는 치수 모양으로 되어 있는데요..
말씀하신 것이...
LD라는 명령어를 실행하면.. "DIM_150_s-LD" 라는 치수모양을 자동으로 만든다음 실행이 되는 것인지.. 아니면.. "DIM_150_s-LD" 라는 치수 모양을 사용자가 미리 만들어 두고.. LD 를 실행하면 해당 치수 모양으로 치수가 기입되는 것인지 궁금합니다.